home *** CD-ROM | disk | FTP | other *** search
/ PCGUIA 2010 Software/Programs / PCGuia_programas.iso / Software / Utils / Universal Viewer / UniversalViewer.exe / Plugins / Syn2 / HL / Clipper.lcf < prev    next >
Encoding:
Text File  |  2007-12-12  |  5.5 KB  |  242 lines
  1. object SyntAnal10: TLibSyntAnalyzer
  2.   Formats = <
  3.     item
  4.       DisplayName = 'Default'
  5.       Font.Charset = DEFAULT_CHARSET
  6.       Font.Color = clWindowText
  7.       Font.Height = -13
  8.       Font.Name = 'Courier New'
  9.       Font.Style = []
  10.       FormatType = ftCustomFont
  11.     end
  12.     item
  13.       DisplayName = 'Symbol'
  14.       Font.Charset = DEFAULT_CHARSET
  15.       Font.Color = clMaroon
  16.       Font.Height = -13
  17.       Font.Name = 'Courier New'
  18.       Font.Style = [fsBold]
  19.     end
  20.     item
  21.       DisplayName = 'Number'
  22.       Font.Charset = DEFAULT_CHARSET
  23.       Font.Color = clNavy
  24.       Font.Height = -13
  25.       Font.Name = 'Courier New'
  26.       Font.Style = [fsBold]
  27.     end
  28.     item
  29.       DisplayName = 'String'
  30.       Font.Charset = DEFAULT_CHARSET
  31.       Font.Color = clBlue
  32.       Font.Height = -13
  33.       Font.Name = 'Courier New'
  34.       Font.Style = []
  35.     end
  36.     item
  37.       DisplayName = 'Identifier'
  38.       Font.Charset = DEFAULT_CHARSET
  39.       Font.Color = clWindowText
  40.       Font.Height = -13
  41.       Font.Name = 'Courier New'
  42.       Font.Style = []
  43.     end
  44.     item
  45.       DisplayName = 'Reserved word'
  46.       Font.Charset = DEFAULT_CHARSET
  47.       Font.Color = clWindowText
  48.       Font.Height = -13
  49.       Font.Name = 'Courier New'
  50.       Font.Style = [fsBold]
  51.     end
  52.     item
  53.       DisplayName = 'Comment'
  54.       Font.Charset = DEFAULT_CHARSET
  55.       Font.Color = clRed
  56.       Font.Height = -13
  57.       Font.Name = 'Courier New'
  58.       Font.Style = [fsBold]
  59.     end
  60.     item
  61.       DisplayName = 'Preprocessor'
  62.       Font.Charset = DEFAULT_CHARSET
  63.       Font.Color = clGreen
  64.       Font.Height = -13
  65.       Font.Name = 'Courier New'
  66.       Font.Style = [fsItalic]
  67.     end
  68.     item
  69.       DisplayName = 'Marked block'
  70.       Font.Charset = DEFAULT_CHARSET
  71.       Font.Color = clHighlightText
  72.       Font.Height = -13
  73.       Font.Name = 'Courier New'
  74.       Font.Style = []
  75.       BgColor = clHighlight
  76.       FormatType = ftColor
  77.     end>
  78.   TokenRules = <
  79.     item
  80.       DisplayName = 'Any name'
  81.       StyleName = 'Identifier'
  82.       TokenType = 2
  83.       Expression = '[a-z_]\w*'
  84.       ColumnFrom = 0
  85.       ColumnTo = 0
  86.     end
  87.     item
  88.       DisplayName = 'Comment 3'
  89.       StyleName = 'Comment'
  90.       TokenType = 1
  91.       Expression = '//.*'
  92.       ColumnFrom = 0
  93.       ColumnTo = 0
  94.     end
  95.     item
  96.       DisplayName = 'Preprocessor'
  97.       StyleName = 'Preprocessor'
  98.       TokenType = 9
  99.       Expression = '\#.*'
  100.       ColumnFrom = 0
  101.       ColumnTo = 0
  102.     end
  103.     item
  104.       DisplayName = 'Symbol'
  105.       StyleName = 'Symbol'
  106.       TokenType = 3
  107.       Expression = '[/\*,\.;:\(\)=<>\+\-\[\]@]'
  108.       ColumnFrom = 0
  109.       ColumnTo = 0
  110.     end
  111.     item
  112.       DisplayName = 'String'
  113.       StyleName = 'String'
  114.       TokenType = 4
  115.       Expression = '".*?("|$)'
  116.       ColumnFrom = 0
  117.       ColumnTo = 0
  118.     end
  119.     item
  120.       DisplayName = 'Float'
  121.       StyleName = 'Number'
  122.       TokenType = 6
  123.       Expression = '\d+ \.? \d+ e [\+\-]? \d+ |'#13#10'\d+ \. \d+'
  124.       ColumnFrom = 0
  125.       ColumnTo = 0
  126.     end
  127.     item
  128.       DisplayName = 'Integer'
  129.       StyleName = 'Number'
  130.       TokenType = 5
  131.       Expression = '\d+'
  132.       ColumnFrom = 0
  133.       ColumnTo = 0
  134.     end>
  135.   BlockRules = <
  136.     item
  137.       DisplayName = 'Key words'
  138.       StyleName = 'Reserved word'
  139.       BlockType = btTagDetect
  140.       ConditionList = <
  141.         item
  142.           TagList.Strings = (
  143.             'announce'
  144.             'begin'
  145.             'break'
  146.             'case'
  147.             'class'
  148.             'continue'
  149.             'declare'
  150.             'do'
  151.             'else'
  152.             'elseif'
  153.             'end'
  154.             'endcase'
  155.             'endclass'
  156.             'enddo'
  157.             'endif'
  158.             'endsequenc'
  159.             'exit'
  160.             'exported'
  161.             'field'
  162.             'for'
  163.             'function'
  164.             'hidden'
  165.             'if'
  166.             'in'
  167.             'init'
  168.             'local'
  169.             'memvar'
  170.             'method'
  171.             'next'
  172.             'nil'
  173.             'note'
  174.             'otherwise'
  175.             'parameters'
  176.             'private'
  177.             'procedure'
  178.             'protected'
  179.             'public'
  180.             'recover'
  181.             'request'
  182.             'return'
  183.             'self'
  184.             'sequence'
  185.             'static'
  186.             'step'
  187.             'then'
  188.             'to'
  189.             'using'
  190.             'var'
  191.             'while')
  192.           TokenTypes = 4
  193.           IgnoreCase = True
  194.         end>
  195.       HighlightPos = cpAny
  196.       IgnoreAsParent = False
  197.     end
  198.     item
  199.       DisplayName = 'function start'
  200.       ConditionList = <
  201.         item
  202.           TagList.Strings = (
  203.             'function')
  204.           TokenTypes = 4
  205.           IgnoreCase = True
  206.         end>
  207.       BlockEnd = 'function end'
  208.       NameFmt = '%s0 %s-1'
  209.       HighlightPos = cpAny
  210.       IgnoreAsParent = False
  211.     end
  212.     item
  213.       DisplayName = 'function end'
  214.       BlockType = btRangeEnd
  215.       ConditionList = <
  216.         item
  217.           TagList.Strings = (
  218.             'return')
  219.           TokenTypes = 4
  220.           IgnoreCase = True
  221.         end>
  222.       HighlightPos = cpAny
  223.       IgnoreAsParent = False
  224.     end>
  225.   CodeTemplates = <>
  226.   SubAnalyzers = <>
  227.   TokenTypeNames.Strings = (
  228.     'Unknown'
  229.     'Comment'
  230.     'Identifier'
  231.     'Symbol'
  232.     'String'
  233.     'Integer const'
  234.     'Float const'
  235.     'Hex const'
  236.     'Char const'
  237.     'Preprocessor')
  238.   MarkedBlockStyle = 'Marked block'
  239.   DefaultStyleName = 'Default'
  240.   LexerName = 'Clipper'
  241. end
  242.